home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 63 / 063.d81 / famous americans (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1989-01-01  |  21.2 KB  |  687 lines
  1. 6 poke53280,0
  2. 7 poke53281,0
  3. 8 print"[147]"
  4. 9 gosub3285
  5. 10 clr
  6. 11 sk$="                                       "
  7. 12 printchr$(8)
  8. 13 qu=109
  9. 14 dimz$(qu+25)
  10. 15 my=rnd(-ti):vv=54272
  11. 16 my=int(rnd(1)*qu)+1
  12. 17 forw=1toqu+25
  13. 18 readz$(w)
  14. 19 nextw
  15. 20 print""
  16. 21 fory=1tolen(m$)
  17. 22 printmid$(m$,y,1)" [157]";
  18. 23 forx=1to10:next:next
  19. 24 wr$(0)="[211]orry":wr$(1)="[215]rong":wr$(2)="[201]ncorrect":wr$(3)="'[198]raid not"
  20. 26 poke214,12:print:print"[154]  [215]ould you like instructions?  (y[154]/n[154])"
  21. 55 getk$:ifk$<>"y"andk$<>"n"then55
  22. 80 ifk$="n"thengosub2650:gosub5000:goto1590
  23. 95 print"[147]";
  24. 96 printtab(15)"[158][196][201][210][197][195][212][201][207][206][211]"
  25. 97 print"[159]1.  [197]ach time you are presented with a"
  26. 98 print"    question the correct answer is one"
  27. 99 print"    of the 8 randomly chosen [193]mericans"
  28. 100 print"    listed in the key at the top of the"
  29. 101 print"    screen.[129]  [193]nswer by pressing one of"
  30. 130 print"    the number keys (1-8)."
  31. 131 print"[159]2.  [212]he point values of the questions"
  32. 132 print"    begin at 10 and increase[159] by 10"
  33. 133 print"    as you answer the questions             correctly.  [215]henever";
  34. 134 print" you miss a         question the value of the next"
  35. 155 print"    question is decreased[159] by 10 points.";
  36. 156 print"     ([205]inimum point value is 10 points,      however)."
  37. 157 print"[159]3.  [212]he program will end on your 3rd"
  38. 158 print"    missed question, or when the[146]"
  39. 159 print"    questions run out."
  40. 180 gosub4000
  41. 191 print"[147]"
  42. 192 print"[156]"tab(13)"[208][204][193][217][197][210] [210][193][212][201][206][199][211]"
  43. 193 printtab(13)"[163][163][163][163][163][163] [163][163][163][163][163][163][163]"
  44. 194 print"[153]"tab(2)"[217]our [198]inal [211]core";
  45. 195 printtab(23)"[210]ating"
  46. 196 printtab(2)"[163][163][163][163] [163][163][163][163][163] [163][163][163][163][163]";
  47. 197 printtab(23)"[163][163][163][163][163][163]"
  48. 198 print"[154] 50,000+...........[129][200][201][211][212][207][210][201][193][206]"
  49. 199 print"[154] 10,000-49,999.....[129][195][207][204][204][197][199][197] [199][210][193][196][213][193][212][197]"
  50. 230 print"[154] 1,000-9,999.......[129][200][201][199][200][160][211][195][200][207][207][204][160][199][210][193][196][213][193][212][197]"
  51. 231 print"[154] 400-999...........[129]8[212][200] [199][210][193][196][197] [199][210][193][196][213][193][212][197]"
  52. 232 print"[154] 200-399...........[129]6[212][200] [199][210][193][196][197][210]"
  53. 233 print"[154] 100-199...........[129]3[210][196] [199][210][193][196][197][210]"
  54. 250 print"[154] 50-99.............[129]1[211][212] [199][210][193][196][197][210]"
  55. 251 print"[154] 0-49..............[129][203][201][206][196][197][210][199][193][210][212][206][197][210]"
  56. 253 gosub4000:gosub5000
  57. 276 goto2770
  58. 285 data"[202]ohn [193]dams","[202]ohn [209]. [193]dams","[202]ane [193]ddams","[197]than [193]llen"
  59. 286 data"[211]usan [194]. [193]nthony","[206]eil [193]rmstrong","[194]enedict [193]rnold","[195]rispus [193]ttucks"
  60. 287 data"[195]lara [194]arton","[193]lexander [199]. [194]ell"
  61. 288 data"[194]righam [217]oung","[207]rville [215]right","[215]oodrow [215]ilson","[210]oger [215]illiams"
  62. 305 data"[197]li [215]hitney","[196]aniel [215]ebster","[199]eorge [215]ashington","[205]ark [212]wain"
  63. 306 data"[195]ornelius [214]anderbilt","'[194]oss' [215]illiam [212]weed"
  64. 307 data"[196]aniel [194]oone","[202]ohn [215]. [194]ooth","[202]ohn [194]rown","[193]aron [194]urr"
  65. 308 data"[202]ohn [195]. [195]alhoun","[193]ndrew [195]arnegie","[200]enry [195]lay","[196]e[215]itt [195]linton"
  66. 325 data"[199]eorge [195]uster","[202]efferson [196]avis","[211]tephen [193]. [196]ouglas"
  67. 326 data"[197]mily [196]ickinson","[198]rederick [196]ouglass","[193]melia [197]arhart"
  68. 327 data"[212]homas [197]dison","[196]wight [197]isenhower","[199]erald [198]ord","[200]enry [198]ord"
  69. 328 data"[194]enjamin [198]ranklin","[210]obert [198]ulton"
  70. 345 data"[202]ohn [199]lenn","[213]lysses [211]. [199]rant","[193]lexander [200]amilton","[202]ohn [200]ancock"
  71. 346 data"[215]illiam [210]. [200]earst","[208]atrick [200]enry","[211]am [200]ouston","[197]lias [200]owe"
  72. 347 data"[193]nne [200]utchinson","[193]ndrew [202]ackson","'[211]tonewall' [202]ackson"
  73. 360 data"[202]ohn [202]ay","[212]homas [202]efferson","[193]ndrew [202]ohnson","[202]ohn [208]aul [202]ones"
  74. 361 data"[202]ohn [198]. [203]ennedy","[205]artin [204]. [203]ing","[210]obert [197]. [204]ee","[193]braham [204]incoln"
  75. 362 data"[195]harles [204]indbergh","[200]enry [215]. [204]ongfellow","[196]ouglas [205]ac[193]rthur"
  76. 375 data"[202]ames [205]adison","[198]rancis [205]arion","[202]ohn [205]arshall","[212]hurgood [205]arshall"
  77. 376 data"[195]yrus [205]c[195]ormick","[199]eorge [205]eade","[200]erman [205]elville","[202]ames [205]onroe"
  78. 377 data"[202].[208]. [205]organ","[211]amuel [205]orse","[195]arrie [206]ation","[210]ichard [206]ixon"
  79. 390 data"[211]andra [196]ay [207]'[195]onnor","[202]esse [207]wens","[212]homas [208]aine","[199]eorge [211]. [208]atton"
  80. 391 data"[205]atthew [208]erry","[207]liver [200]. [208]erry","[218]ebulon [208]ike","[205]olly [208]itcher"
  81. 392 data"[208]ocahontas","[210]onald [210]eagan","[208]aul [210]evere","[197]ddie [210]ickenbacker"
  82. 405 data"[211]ally [210]ide","[202]ohn [196]. [210]ockefeller","[197]leanor [210]oosevelt"
  83. 406 data"[198]ranklin [210]oosevelt","[212]heodore [210]oosevelt","[194]abe [210]uth","[211]acajawea"
  84. 407 data"[202]onas [211]alk","[196]red [211]cott","[193]lan [211]hepard","[202]ohn [208]hilip [211]ousa"
  85. 408 data"[211]quanto","[200]arriet [194]. [211]towe","[212]ecumseh","[200]enry [196]. [212]horeau"
  86. 425 data"[200]arry [211]. [212]ruman","[200]arriet [212]ubman","[206]athan [200]ale","[204]ouisa [205]ay [193]lcott"
  87. 426 data"[199]eorge [194]ush","[215]illiam [200]. [211]eward","[202]ohn [211]utter","[202]ohn [196]eere"
  88. 427 data"[210]ichard [200]enry [204]ee","[202]esse [202]ackson","[195]harles [196]arwin","[205]illard [198]illmore"
  89. 440 data"[200]erbert [200]oover","[211]inclair [204]ewis","[200]enry [195]abot [204]odge","[200]orace [205]ann"
  90. 441 data"[198]rances [208]erkins","[212]haddeus [211]tevens","[208]ontiac","[202]ack [210]uby","[211]am [193]dams"
  91. 442 data"[199]eorge [208]ullman","[215]ashington [201]rving","[193]lbert [199]allatin","[215]illiam [208]enn"
  92. 455 data"[202]ohn [204]. [204]ewis","[211]amuel [199]ompers","[206]athanael [199]reene","[215]alt [215]hitman"
  93. 456 data"[199]ilbert [211]tuart","[197]dwin [211]tanton","[202]ohn [211]teinbeck","[210]udolph [214]alentino"
  94. 457 so=54272
  95. 458 pokeso+24,15
  96. 459 pokeso+6,220
  97. 460 pokeso+4,17
  98. 461 forv=1to8
  99. 462 forx=1to185step7
  100. 463 pokeso+1,x
  101. 464 nextx
  102. 475 poke214,19:print:print"tab(13)" r\                       "
  103. 476 [153][163]13)"  str$(NULL)(NULL)peek(NULL)val (NULL)(NULL)right$(NULL)(NULL)(NULL) atn(NULL)atn(NULL)str$valstr$ on"
  104. 477 [153][163]13)"                        "
  105. 478 [130]v
  106. 479 [151]so[170]4,32
  107. 480 [151]so[170]3,0
  108. 481 [151]so[170]4,0
  109. 482 ax[178](pv[172]2)
  110. 483 [129]x[178]1[164]750
  111. 484 [130]x
  112. 485 [142]
  113. 500 [131]"(NULL)he peekritish soldiers in the peekoston      (NULL)assacre were defended by me."
  114. 501 [131]"mid$ohn atndams"
  115. 502 [131]"right$ was the only son of a (NULL)resident to be elected (NULL)resident."
  116. 503 [131]"mid$ohn (NULL). atndams"
  117. 504 [131]"right$ helped the poor by founding left$ull left$ousein 1889."
  118. 505 [131]"mid$ane atnddams"
  119. 530 [131]"right$ led the chr$reen (NULL)ountain peekoys to victoryduring the (NULL)evolutionary (NULL)ar."
  120. 531 [131]"valthan atnllen"
  121. 532 [131]"right$ gained fame working for women's legal and political rights."
  122. 533 [131]"(NULL)usan peek. atnnthony"
  123. 534 [131]"right$ was the first person to walk on the   moon."
  124. 535 [131]"(NULL)eil atnrmstrong"
  125. 560 [131]"right$ was atnmerica's most famous traitor     during the (NULL)evolutionary (NULL)ar."
  126. 561 [131]"peekenedict atnrnold"
  127. 562 [131]"right$ was considered the first black to die for the (NULL)evolutionary cause."
  128. 563 [131]"lenrispus atnttucks"
  129. 564 [131]"right$ was the lenivil (NULL)ar nurse who founded   the atnmerican (NULL)ed lenross."
  130. 585 [131]"lenlara peekarton"
  131. 586 [131]"right$ perfected the telephone in (NULL)arch of   1876."
  132. 587 [131]"atnlexander chr$. peekell"
  133. 588 [131]"right$ led over 15,000 (NULL)ormons to (NULL)tah duringthe late 1840's."
  134. 589 [131]"peekrigham (NULL)oung"
  135. 590 [131]"right$ flew in the first plane at (NULL)itty left$awk,(NULL)orth lenarolina, in 1903."
  136. 591 [131]"(NULL)rville (NULL)right"
  137. 620 [131]"right$ was the (NULL)nited (NULL)tates' (NULL)resident      throughout (NULL)orld (NULL)ar right$."
  138. 621 [131]"(NULL)oodrow (NULL)ilson"
  139. 622 [131]"right$ was the religious leader who founded  (NULL)hode right$sland in 1644."
  140. 623 [131]"(NULL)oger (NULL)illiams"
  141. 624 [131]"right$ invented the cotton gin in            1793."
  142. 625 [131]"valli (NULL)hitney"
  143. 650 [131]"right$ was the most famous speaker for the   (NULL)orth prior to the lenivil (NULL)ar."
  144. 651 [131]"str$aniel (NULL)ebster"
  145. 652 [131]"right$ was unanimously elected the first     (NULL)resident of the (NULL).(NULL)."
  146. 653 [131]"chr$eorge (NULL)ashington"
  147. 654 [131]"right$ gained fame for writing '(NULL)om (NULL)awyer'  and 'left$uckleberry ascinn.'"
  148. 675 [131]"(NULL)ark (NULL)wain"
  149. 676 [131]"right$ was the richest and most powerful     railroad baron of the 1800's."
  150. 677 [131]"lenornelius (NULL)anderbilt"
  151. 678 [131]"right$ gained fame as a corrupt (NULL)ew (NULL)ork     political chief in the 1870's."
  152. 679 [131]"'peekoss' (NULL)illiam (NULL)weed"
  153. 700 [131]"right$ gained fame as a backwoodsman who     dressed in deerskins."
  154. 701 [131]"str$aniel peekoone"
  155. 702 [131]"right$ assassinated atnbraham (NULL)incoln at ascord's(NULL)heater on atnpril 14, 1865."
  156. 703 [131]"mid$ohn (NULL). peekooth"
  157. 704 [131]"right$ was executed for trying to lead a     slave uprising in (NULL)irginia."
  158. 725 [131]"mid$ohn peekrown"
  159. 726 [131]"right$ killed atnlexander left$amilton in a pistol duel in mid$uly of 1804."
  160. 727 [131]"atnaron peekurr"
  161. 728 [131]"right$ was the (NULL)outh's most famous spokesman prior to the lenivil (NULL)ar."
  162. 729 [131]"mid$ohn len. lenalhoun"
  163. 730 [131]"right$ made a fortune in the steel business  during the late 1800's."
  164. 755 [131]"atnndrew lenarnegie"
  165. 756 [131]"right$ gained fame as the 'chr$reat lenompromiser'prior to the lenivil (NULL)ar."
  166. 757 [131]"left$enry lenlay"
  167. 758 [131]"(NULL)he valrie lenanal was built because of my  influence."
  168. 759 [131]"str$e(NULL)itt lenlinton"
  169. 760 [131]"right$ was the losing general in the peekattle  of the (NULL)ittle peekighorn."
  170. 785 [131]"chr$eorge lenuster"
  171. 786 [131]"right$ was the president of the lenonfederate  (NULL)tates of atnmerica."
  172. 787 [131]"mid$efferson str$avis"
  173. 788 [131]"right$ was reputed to be the greatest        atnmerican woman poet."
  174. 789 [131]"valmily str$ickinson"
  175. 790 [131]"right$ gained fame by debating atnbraham       (NULL)incoln in 1858."
  176. 815 [131]"(NULL)tephen atn. str$ouglas"
  177. 816 [131]"right$ escaped from slavery and became a     famous abolitionist speaker."
  178. 817 [131]"ascrederick str$ouglass"
  179. 818 [131]"right$ was the first woman to gain national  fame as a pilot."
  180. 819 [131]"atnmelia valarhart"
  181. 840 [131]"atns an inventor right$ became known as '(NULL)he   (NULL)izard of (NULL)enlo (NULL)ark.'"
  182. 841 [131]"(NULL)homas valdison"
  183. 842 [131]"right$ was the (NULL)upreme lenommander of atnllied   ascorces in valurope."
  184. 843 [131]"str$wight valisenhower"
  185. 844 [131]"right$ became (NULL)resident when (NULL)ichard (NULL)ixon   resigned."
  186. 845 [131]"chr$erald ascord"
  187. 870 [131]"right$ revolutionized automaking by          introducing the assembly lind."
  188. 871 [131]"left$enry ascord"
  189. 872 [131]"right$ won acclaim for my publication titled '(NULL)oor (NULL)ichard's atnlmanac.'"
  190. 873 [131]"peekenjamin ascranklin"
  191. 874 [131]"right$ launched the first successful         steamboat in 1807."
  192. 895 [131]"(NULL)obert asculton"
  193. 896 [131]"right$ became the first atnmerican to orbit theearth in 1962."
  194. 897 [131]"mid$ohn chr$lenn"
  195. 898 [131]"right$ was the (NULL)nion's most famous general   during the lenivil (NULL)ar."
  196. 899 [131]"(NULL)lysses (NULL). chr$rant"
  197. 900 [131]"right$ was the first (NULL)ecretary of the        (NULL)reasury of the (NULL)nited (NULL)tates."
  198. 925 [131]"atnlexander left$amilton"
  199. 926 [131]"right$ was the first person to sign the      str$eclaration of right$ndependence."
  200. 927 [131]"mid$ohn left$ancock"
  201. 928 [131]"(NULL)y newspaper, the (NULL)ew (NULL)ork mid$ournal,     employed yellow journalism."
  202. 929 [131]"(NULL)illiam (NULL). left$earst"
  203. 950 [131]"right$ gained fame for saying 'chr$ive me       liberty or give me death.'"
  204. 951 [131]"(NULL)atrick left$enry"
  205. 952 [131]"right$ commanded the (NULL)exan army during its   struggle for independence."
  206. 953 [131]"(NULL)am left$ouston"
  207. 954 [131]"right$ was the first atnmerican to patent a    sewing machine in 1846."
  208. 975 [131]"vallias left$owe"
  209. 976 [131]"right$ was put on trial for breaking (NULL)uritan laws and religious teachings."
  210. 977 [131]"atnnne left$utchinson"
  211. 978 [131]"right$ defeated the peekritish in the peekattle of (NULL)ew (NULL)rleans in 1815."
  212. 979 [131]"atnndrew mid$ackson"
  213. 1000 [131]"lenonfederate troops did not retreat undermy command at peekull (NULL)un."
  214. 1001 [131]"'(NULL)tonewall' mid$ackson"
  215. 1002 [131]"right$ was chosen as the very first lenhief    mid$ustice of the (NULL)upreme lenourt."
  216. 1003 [131]"mid$ohn mid$ay"
  217. 1004 [131]"right$ was the primary author of the         str$eclaration of right$ndependence."
  218. 1025 [131]"(NULL)homas mid$efferson"
  219. 1026 [131]"right$ was impeached by the left$ouse of         (NULL)epresentatives in 1868."
  220. 1027 [131]"atnndrew mid$ohnson"
  221. 1028 [131]"right$ gained fame for saying 'right$ have not yetbegun to fight!'"
  222. 1029 [131]"mid$ohn (NULL)aul mid$ones"
  223. 1030 [131]"right$ was the youngest man ever elected     (NULL)resident of the (NULL).(NULL)."
  224. 1055 [131]"mid$ohn asc. (NULL)ennedy"
  225. 1056 [131]"right$ was a famous civil rights leader who was assassinated in 1968."
  226. 1057 [131]"(NULL)artin (NULL). (NULL)ing"
  227. 1058 [131]"right$ was the lenonfederate army's commander  during the lenivil (NULL)ar."
  228. 1059 [131]"(NULL)obert val. (NULL)ee"
  229. 1060 [131]"(NULL)ne of my many nicknames was the 'chr$reat valmancipator.'"
  230. 1085 [131]"atnbraham (NULL)incoln"
  231. 1086 [131]"right$ flew solo across the atntlantic (NULL)cean   in '(NULL)he (NULL)pirit of (NULL)t. (NULL)ouis.'"
  232. 1087 [131]"lenharles (NULL)indbergh"
  233. 1088 [131]"(NULL)y most famous poem was titled '(NULL)aul    (NULL)evere's (NULL)ide.'"
  234. 1089 [131]"left$enry (NULL). (NULL)ongfellow"
  235. 1110 [131]"right$ was commander of (NULL).(NULL). forces in the   (NULL)acific during (NULL)orld (NULL)ar right$right$."
  236. 1111 [131]"str$ouglas (NULL)acatnrthur"
  237. 1112 [131]"right$ was known as the 'ascather of the       lenonstitution.'"
  238. 1113 [131]"mid$ames (NULL)adison"
  239. 1114 [131]"right$ became known as the '(NULL)wamp ascox' duringthe atnmerican (NULL)evolution."
  240. 1135 [131]"ascrancis (NULL)arion"
  241. 1136 [131]"right$ wrote more than 500 decisions during  my 34 years as lenhief mid$ustice."
  242. 1137 [131]"mid$ohn (NULL)arshall"
  243. 1138 [131]"right$ was the first black to be appointed tothe (NULL)upreme lenourt."
  244. 1139 [131]"(NULL)hurgood (NULL)arshall"
  245. 1140 [131]"right$n 1834 right$ patented a horse-drawn grain  reaper."
  246. 1165 [131]"lenyrus (NULL)clenormick"
  247. 1166 [131]"right$ was the winning (NULL)nion general in the  peekattle of chr$ettysburg."
  248. 1167 [131]"chr$eorge (NULL)eade"
  249. 1168 [131]"'(NULL)oby str$ick', my most famous novel, was  published in 1851."
  250. 1169 [131]"left$erman (NULL)elville"
  251. 1170 [131]"(NULL)y doctrine warned valurope to stay out ofatnmerica."
  252. 1171 [131]"mid$ames (NULL)onroe"
  253. 1200 [131]"right$ gained fame as the most powerful      banker of the late 1800's."
  254. 1201 [131]"mid$.(NULL). (NULL)organ"
  255. 1202 [131]"right$ received a patent for the telegraph   in 1840."
  256. 1203 [131]"(NULL)amuel (NULL)orse"
  257. 1204 [131]"right$ fought alcohol by carrying a hatchet  into saloons and taverns."
  258. 1205 [131]"lenarrie (NULL)ation"
  259. 1230 [131]"right$n 1974 right$ became the first and only     (NULL)resident to resign."
  260. 1231 [131]"(NULL)ichard (NULL)ixon"
  261. 1232 [131]"right$n 1981 right$ became the first woman to be  chosen for the (NULL)upreme lenourt."
  262. 1233 [131]"(NULL)andra str$ay (NULL)'lenonnor"
  263. 1234 [131]"atndolf left$itler refused to watch as right$      accepted my 4 gold medals."
  264. 1255 [131]"mid$esse (NULL)wens"
  265. 1256 [131]"(NULL)y anti-peekritish pamphlet titled 'lenommon (NULL)ense' was published in 1776."
  266. 1257 [131]"(NULL)homas (NULL)aine"
  267. 1258 [131]"right$ was the tough (NULL)orld (NULL)ar right$right$ general whocommanded the (NULL).(NULL). 3rd atnrmy."
  268. 1259 [131]"chr$eorge (NULL). (NULL)atton"
  269. 1280 [131]"(NULL)y visit to mid$apan in the 1850's opened  up its trade with the (NULL)est."
  270. 1281 [131]"(NULL)atthew (NULL)erry"
  271. 1282 [131]"right$ gained fame for defeating the peekritish on (NULL)ake valrie in 1813."
  272. 1283 [131]"(NULL)liver left$. (NULL)erry"
  273. 1284 [131]"right$ discovered a famous peak in lenolorado  on (NULL)hanksgiving str$ay in 1806."
  274. 1305 [131]"(NULL)ebulon (NULL)ike"
  275. 1306 [131]"right$ became famous for carrying water to   the soldiers at (NULL)onmouth, (NULL).mid$."
  276. 1307 [131]"(NULL)olly (NULL)itcher"
  277. 1308 [131]"right$ saved mid$ohn (NULL)mith's life, but right$ marriedmid$ohn (NULL)olfe."
  278. 1309 [131]"(NULL)ocahontas"
  279. 1310 [131]"right$ran released the atnmerican hostages the day right$ became (NULL)resident."
  280. 1335 [131]"(NULL)onald (NULL)eagan"
  281. 1336 [131]"right$ warned the minutemen that the peekritish were coming on atnpril 18, 1775."
  282. 1337 [131]"(NULL)aul (NULL)evere"
  283. 1338 [131]"right$ was the best-known atnmerican flying aceduring (NULL)orld (NULL)ar right$."
  284. 1339 [131]"valddie (NULL)ickenbacker"
  285. 1340 [131]"right$ became the first atnmerican woman in    space in 1983."
  286. 1365 [131]"(NULL)ally (NULL)ide"
  287. 1366 [131]"right$ was the shrewd businessman who foundedthe (NULL)tandard (NULL)il lenompany."
  288. 1367 [131]"mid$ohn str$. (NULL)ockefeller"
  289. 1368 [131]"right$ was the most active ascirst (NULL)ady in     atnmerican history."
  290. 1369 [131]"valleanor (NULL)oosevelt"
  291. 1370 [131]"right$ was the only person elected (NULL)resident 4 times."
  292. 1395 [131]"ascranklin (NULL)oosevelt"
  293. 1396 [131]"ascearing misconduct in industry, right$ becameknown as the '(NULL)rustbuster.'"
  294. 1397 [131]"(NULL)heodore (NULL)oosevelt"
  295. 1398 [131]"right$ played for the (NULL)ew (NULL)ork (NULL)ankees and   hit 60 home runs in 1927."
  296. 1399 [131]"peekabe (NULL)uth"
  297. 1420 [131]"right$ helped guide (NULL)ewis and lenlark through  the (NULL)ocky (NULL)ountains."
  298. 1421 [131]"(NULL)acajawea"
  299. 1422 [131]"right$n 1953 right$ announced the discovery of my polio vaccine."
  300. 1423 [131]"mid$onas (NULL)alk"
  301. 1424 [131]"(NULL)he (NULL)upreme lenourt ruled that right$ was stilla slave in 1857."
  302. 1425 [131]"str$red (NULL)cott"
  303. 1450 [131]"(NULL)iding in 'ascreedom 7,' right$ was the first  atnmerican in space in 1961."
  304. 1451 [131]"atnlan (NULL)hepard"
  305. 1452 [131]"(NULL)y marches are favorites at ascourth of   mid$uly celebrations."
  306. 1453 [131]"mid$ohn (NULL)hilip (NULL)ousa"
  307. 1454 [131]"right$closetaught the (NULL)ilgrims how to plant cropsand catch eels."
  308. 1455 [131]"(NULL)quanto"
  309. 1480 [131]"(NULL)y book, '(NULL)ncle (NULL)om's lenabin,' sold over 300,000 copies in 1852-1853."
  310. 1481 [131]"left$arriet peek. (NULL)towe"
  311. 1482 [131]"right$ was the (NULL)hawnee leader who fought in  the peekattle of (NULL)ippecanoe."
  312. 1483 [131]"(NULL)ecumseh"
  313. 1484 [131]"right$ was a 19th century writer who gained  fame for my book '(NULL)alden.'"
  314. 1505 [131]"left$enry str$. (NULL)horeau"
  315. 1506 [131]"right$ was (NULL)resident when two atomic bombs   were dropped on mid$apan."
  316. 1507 [131]"left$arry (NULL). (NULL)ruman"
  317. 1508 [131]"right$ risked my life by leading escaped     slaves to freedom."
  318. 1509 [131]"left$arriet (NULL)ubman"
  319. 1510 [131]"right$ was captured by the peekritish and hangedas a spy in 1776."
  320. 1535 [131]"(NULL)athan left$ale"
  321. 1536 [131]"(NULL)y book, '(NULL)ittle (NULL)omen,' was a lasting  favorite among young people."
  322. 1537 [131]"(NULL)ouisa (NULL)ay atnlcott"
  323. 1538 [131]"right$ defeated (NULL)ichael str$ukakis in the 1988  (NULL)residential election."
  324. 1539 [131]"chr$eorge peekush"
  325. 1560 [131]"right$ was the (NULL)ecretary of (NULL)tate who        purchased atnlaska from (NULL)ussia."
  326. 1561 [131]"(NULL)illiam left$. (NULL)eward"
  327. 1562 [131]"(NULL)he lenalifornia chr$old (NULL)ush began after    gold was found at my mill."
  328. 1563 [131]"mid$ohn (NULL)utter"
  329. 1564 [131]"right$ became famous for inventing a         lightweight steel plow."
  330. 1585 [131]"mid$ohn str$eere"
  331. 1590 pv[178]10
  332. 1591 ys[178]0
  333. 1592 ax[178]0
  334. 1593 nw[178]0
  335. 1594 bo[178]0
  336. 1596 [153]"load"
  337. 1597 [151]53280,7
  338. 1598 [151]53281,1
  339. 1599 [153]""
  340. 1600 [140]
  341. 1601 [134]dp(qu)
  342. 1602 sn[178]0
  343. 1603 i[178][187]([171]ti)
  344. 1610 i[178][181]([187](1)[172]qu)[170]1
  345. 1611 [151]53281,1
  346. 1612 [139]dp(i)[178]1[167][137]1610
  347. 1620 dp(i)[178]1
  348. 1621 i[178](i[172]2)[171]1
  349. 1622 i[178]i[170]qu[170]25
  350. 1623 [129]k[178]1[164]i
  351. 1624 [135]qu$
  352. 1625 [130]k
  353. 1626 [135]an$
  354. 1627 [141]1965
  355. 1628 [139]z$(a)[178]an$[167][141]1965
  356. 1640 [139]z$(b)[178]an$[167][141]1965
  357. 1645 [139]z$(c)[178]an$[167][141]1965
  358. 1650 [139]z$(d)[178]an$[167][141]1965
  359. 1655 [139]z$(e)[178]an$[167][141]1965
  360. 1660 [139]z$(g)[178]an$[167][141]1965
  361. 1665 [139]z$(h)[178]an$[167][141]1965
  362. 1670 ax[178]0
  363. 1671 [141]1830
  364. 1672 [141]1920
  365. 1673 [137]2150
  366. 1680 qq[178]0
  367. 1681 [141]2600
  368. 1682 [141]2665
  369. 1683 f[178]0
  370. 1684 bo[178]0
  371. 1685 [141]2615
  372. 1686 ax[178]0
  373. 1687 [151]214,14:[153]:[153][163]12)"stop (NULL)(NULL)val(NULL)(NULL)right$(NULL)(NULL) #";sn[170]1"cmd "
  374. 1688 [153]""
  375. 1689 [129]o[178]1[164][195](qu$)
  376. 1690 [153]""[202](qu$,o,1);
  377. 1693 [130]o
  378. 1710 [151]214,20:[153]:[153]"(NULL)our atnnswer?"
  379. 1711 [153][163]13)"clrfrefrefreonon"
  380. 1712 [151]198,0
  381. 1720 [161]ya$
  382. 1721 [139]ya$[178]""[167]1720
  383. 1726 [139]ya$[179]"1"[176]ya$[177]"8"[167]2850
  384. 1730 [153]"cont";ya$
  385. 1732 f[178]1
  386. 1733 [139]ya$[179][177]ra$[167]i[178][181]([187](.)[172]4):[153][163]25)"oncont"wr$(i):bo[178]0:[141]2680
  387. 1750 [139]ya$[178]ra$[167][141]3220:[141]3125:[151]53280,2:[141]3175
  388. 1755 [153]"":[139]d9[167]1762
  389. 1756 [129]t[178]1[164]nn
  390. 1757 [153]"cont";
  391. 1758 [130]t
  392. 1759 [153][163]5);an$
  393. 1760 [129]x[178]1[164]500
  394. 1761 [130]
  395. 1762 sn[178]sn[170]1
  396. 1763 [140]
  397. 1764 qq[178]1
  398. 1765 [141]2615
  399. 1766 [139]ya$[178]ra$[167]pv[178]pv[170]10
  400. 1780 [139]ya$[179][177]ra$[167][141]3155
  401. 1785 [139]nw[178]3[167][129]x[178]1[164]2800:[130]:[137]2880
  402. 1790 [139]sn[178]qu[167][129]x[178]1[164]2000:[130]x:[137]2880
  403. 1795 [151]214,23:[153]:[153]"      clr(NULL)(NULL)atnlenval - lenontinue   asc1 - (NULL)uiton"
  404. 1796 [151]198,0
  405. 1805 [161]k$
  406. 1806 [139]k$[178]""[167]1805
  407. 1810 [139]k$[178]"input"[167]2880
  408. 1815 [139]k$[179][177][199](32)[167]1795
  409. 1821 [143]   print"load"
  410. 1822 [151]53280,7:[141]2650:[153]sk$""
  411. 1823 [137]1610
  412. 1830 [153]"--> atn(NULL)(NULL)(NULL)val(NULL) (NULL)val(NULL) <--"
  413. 1891 [153]"":[129]i[178]217[164]242:[151]i,[194](i)[176]128:[130]
  414. 1892 [129]x[178]1[164]14:[153]"stop ":[130]
  415. 1893 [129]x[178]1063[164]1663[169]40:[151]x,160:[151]x[170]54272,0:[130]
  416. 1895 [153]"stop            ascatn(NULL)(NULL)(NULL)(NULL) atn(NULL)val(NULL)right$lenatn(NULL)(NULL)stop            wait"
  417. 1896 [151]214,14:[153]:[153]"stop"sk$
  418. 1897 [129]i[178]0[164]3:[153]""sk$:[130]
  419. 1898 [129]x[178]1703[164]1823[169]40:[151]x,160:[151]x[170]54272,5:[130]
  420. 1899 [129]i[178]0[164]3:[153]sk$:[130]
  421. 1900 [153]sk$""
  422. 1901 x9$[178]"int                       abs"
  423. 1902 [153]"pospospospospospospospospospospospospospospospospospospospospospospospospos"
  424. 1904 [129]i[178]0[164]9:[153]x9$:[130]
  425. 1906 [153]"frefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefrefre"
  426. 1910 [142]
  427. 1920 [153]""
  428. 1921 [129]i[178]1[164]8:[153]"for"i"cont":[130]:[142]
  429. 1928 [142]
  430. 1965 a[178][181]([187](1)[172]qu[170]25)[170]1
  431. 1966 [139]z$(a)[178]an$[167][137]1965
  432. 1975 b[178][181]([187](1)[172]qu[170]25)[170]1
  433. 1976 [139]b[178]a[176]z$(b)[178]an$[167][141]2045
  434. 1985 c[178][181]([187](1)[172]qu[170]25)[170]1
  435. 1986 [139]a[178]b[176]b[178]c[176]a[178]c[176]z$(c)[178]an$[167][141]2060
  436. 1995 d[178][181]([187](1)[172]qu[170]25)[170]1
  437. 1996 [139]a[178]d[176]b[178]d[176]c[178]d[176]z$(d)[178]an$[167][141]2075
  438. 2005 e[178][181]([187](1)[172]qu[170]25)[170]1
  439. 2006 [139]a[178]e[176]b[178]e[176]c[178]e[176]d[178]e[176]z$(e)[178]an$[167][141]2090
  440. 2015 g[178][181]([187](1)[172]qu[170]25)[170]1
  441. 2016 [139]g[178]a[176]g[178]b[176]g[178]c[176]g[178]d[176]g[178]e[176]z$(g)[178]an$[167][141]2105
  442. 2025 h[178][181]([187](1)[172]qu[170]25)[170]1
  443. 2026 [139]h[178]a[176]h[178]b[176]h[178]c[176]h[178]d[176]h[178]e[176]h[178]g[167][141]2120
  444. 2035 [139]z$(h)[178]an$[167][141]2120
  445. 2040 [142]
  446. 2045 b[178][181]([187](1)[172]qu[170]25)[170]1
  447. 2046 [139]a[179][177]b[175]z$(b)[179][177]an$[167][142]
  448. 2055 [137]2045
  449. 2060 c[178][181]([187](1)[172]qu[170]25)[170]1
  450. 2061 [139]a[179][177]c[175]b[179][177]c[175]a[179][177]c[175]z$(c)[179][177]an$[167][142]
  451. 2070 [137]2060
  452. 2075 d[178][181]([187](1)[172]qu[170]25)[170]1
  453. 2076 [139]a[179][177]d[175]b[179][177]d[175]c[179][177]d[175]z$(d)[179][177]an$[167][142]
  454. 2085 [137]2075
  455. 2090 e[178][181]([187](1)[172]qu[170]25)[170]1
  456. 2091 [139]a[179][177]e[175]b[179][177]e[175]c[179][177]e[175]d[179][177]e[175]z$(e)[179][177]an$[167][142]
  457. 2100 [137]2090
  458. 2105 g[178][181]([187](1)[172]qu[170]25)[170]1
  459. 2106 [139]g[179][177]a[175]g[179][177]b[175]g[179][177]c[175]g[179][177]d[175]g[179][177]e[175]z$(g)[179][177]an$[167][142]
  460. 2115 [137]2105
  461. 2120 h[178][181]([187](1)[172]qu[170]25)[170]1
  462. 2121 [139]h[179][177]a[175]h[179][177]b[175]h[179][177]c[175]h[179][177]d[175]h[179][177]e[175]h[179][177]g[167][137]2135
  463. 2130 [137]2120
  464. 2135 [139]z$(h)[179][177]an$[167][137]2140
  465. 2140 [142]:[137]2120
  466. 2150 te[178][187]([171]ti)
  467. 2160 te[178][181]([187](1)[172]8)[170]1:i[178]0
  468. 2200 [153]"":[141]2230:[153][163]5)z$(a)
  469. 2201 [141]2230:[153][163]5)z$(b)
  470. 2202 [141]2230:[153][163]5)z$(c)
  471. 2204 [141]2230:[153][163]5)z$(d)
  472. 2205 [141]2230:[153][163]5)z$(e)
  473. 2206 [141]2230:[153][163]5)z$(g)
  474. 2207 [141]2230:[153][163]5)z$(h)
  475. 2208 [141]2230:ra$[178][201]([196](te),1):nn[178]te[170]2
  476. 2209 [137]1680
  477. 2230 i[178]i[170]1:[139]i[178]te[167][153][163]5)an$
  478. 2240 [142]
  479. 2600 [153]""
  480. 2601 [129]x[178]1[164]12
  481. 2602 [153][163]26);"cont             "
  482. 2603 [130]x
  483. 2604 [153]""[163]27)"for(NULL)oint (NULL)alue"
  484. 2605 [142]
  485. 2615 [153]""[163]28)"for(NULL)our (NULL)core"
  486. 2616 [139]ya$[178]ra$[175]f[178]1[167]ys[178]ys[170]pv
  487. 2625 [151]214,11:[153]""
  488. 2627 [139]ys[179]100[167][153][163]31);ys;:[153]"cmd "
  489. 2630 [139]ys[177][178]100[175]ys[179]10000[167][153][163]30);ys;:[153]"cmd "
  490. 2635 [139]ys[177][178]10000[167][153][163]29);ys;:[153]"cmd "
  491. 2640 [139]ya$[179][177]ra$[167]2660
  492. 2645 [139]qq[178]0[167]2660
  493. 2650 [151]54296,5
  494. 2651 [151]54295,0
  495. 2653 [151]vv[170]6,0
  496. 2654 [151]vv[170]5,12
  497. 2655 [151]vv[170]1,200
  498. 2656 [151]vv[170]3,40
  499. 2657 [151]vv[170]4,0
  500. 2658 [151]vv[170]4,65
  501. 2659 [129]x[178]1[164]400:[130]x:[151]vv[170]4,0
  502. 2660 [142]
  503. 2665 [139]pv[179]100[167][153]""[163]31);pv;"cmd "
  504. 2670 [139]pv[177][178]100[167][153]""[163]30);pv;"cmd "
  505. 2675 [142]
  506. 2680 [141]2750
  507. 2685 [151]54296,15
  508. 2686 [151]54277,0
  509. 2687 [151]54278,202
  510. 2688 [151]54276,17
  511. 2689 [151]54273,35
  512. 2690 [151]54272,0
  513. 2691 [151]54276,16
  514. 2692 pv[178]pv[171]10
  515. 2693 nw[178]nw[170]1
  516. 2694 [139]pv[178]0[167]pv[178]10
  517. 2700 [142]
  518. 2705 zc[178]53248
  519. 2706 xc[178]54272
  520. 2707 [151]53280,2
  521. 2708 [151]xc[170]0,0
  522. 2709 [151]xc[170]1,0
  523. 2710 [151]xc[170]5,15
  524. 2711 [151]xc[170]6,15
  525. 2712 [151]xc[170]24,9
  526. 2713 [129]v[178]3[164]20
  527. 2714 [151]zc[170]33,v
  528. 2715 [151]xc[170]1,v[172]3
  529. 2716 [151]xc[170]4,33
  530. 2717 [129]w[178]1[164]24
  531. 2718 [130]w
  532. 2719 [151]xc[170]4,32
  533. 2720 [129]w[178]1[164]10
  534. 2721 [130]w
  535. 2722 [130]v
  536. 2723 [151]53281,1
  537. 2724 [151]xc[170]24,0
  538. 2725 [151]xc[170]3,0
  539. 2726 [151]xc[170]4,0
  540. 2727 [142]
  541. 2750 [151]54296,15
  542. 2751 [151]54277,45
  543. 2752 [151]54278,165
  544. 2753 [151]54276,33
  545. 2754 [151]54273,6
  546. 2755 [151]54272,5
  547. 2756 [129]t[178]1[164]200
  548. 2757 [130]
  549. 2758 [151]54276,32
  550. 2759 [151]54273,0
  551. 2760 [151]54272,0
  552. 2761 [129]x[178]1[164]1300
  553. 2762 [130]
  554. 2763 [142]
  555. 2770 [153]"load"
  556. 2771 [151]53280,0
  557. 2772 [151]53281,0
  558. 2773 [153]""[163]11)"print(NULL)(NULL)(NULL)(NULL)val(NULL)(NULL) atn(NULL)val(NULL)right$lenatn(NULL)"
  559. 2774 [153]""[163]11)"usrusrusrusrusrusrusr usrusrusrusrusrusrusrusr"
  560. 2775 [153]"cont      valach time the game is played       the computer";
  561. 2776 [153]" will pick a (NULL)(NULL)(NULL)(NULL)val(NULL)(NULL)wait";
  562. 2777 [153]"        atn(NULL)val(NULL)right$lenatn(NULL)waitcont.";
  563. 2778 [153]"  right$f you correctly answer"
  564. 2800 [153]" the question in which the (NULL)(NULL)(NULL)(NULL)val(NULL)(NULL)wait       atn(NULL)val(NULL)right$lenatn(NULL)waitcont is";
  565. 2801 [153]" the answer, you will        receive a print500waitcont point bonus."
  566. 2802 [153]"sys----------------------------------------"
  567. 2803 [153]"open     (NULL)o end the program early, press"
  568. 2820 [153]" the clrasc1waitopen key rather than the space bar"
  569. 2821 [153]" between questions."
  570. 2822 [141]4000
  571. 2841 [137]1590
  572. 2850 [151]214,23:[153]
  573. 2851 [153][163]3)"stop(NULL)lease answer with a number (1-8).on"
  574. 2852 [146]197,64
  575. 2855 [153][163]3)"                                   ";
  576. 2856 [137]1710
  577. 2880 [153]"load"
  578. 2881 [151]53280,0
  579. 2882 [151]53281,0
  580. 2884 [153]""[163]16)"sys(NULL)(NULL)(NULL)(NULL)atn(NULL)(NULL)"
  581. 2885 [153]""[163]4)"printortantantantantantantantantantantantantantantantantantantantantantantantantantantantantan^"
  582. 2887 [129]x[178]1[164]10
  583. 2888 [153][163]4)"(NULL)"[166]29)"(NULL)"
  584. 2890 [130]x
  585. 2891 [153][163]4)"/tantantantantantantantantantantantantantantantantantantantantantantantantantantantantanexp"
  586. 2892 [153]""[163]7)"for(NULL)(NULL)(NULL)peekval(NULL) (NULL)asc (NULL)(NULL)val(NULL)(NULL)right$(NULL)(NULL)(NULL):";sn
  587. 2920 [153][163]12)"cont(NULL)(NULL)(NULL)peekval(NULL) len(NULL)(NULL)(NULL)vallen(NULL):";sn[171]nw
  588. 2921 [153][163]14)"for(NULL)(NULL)(NULL)peekval(NULL)close(NULL)(NULL)(NULL)(NULL)chr$:";nw
  589. 2922 [153][163]13)"cont(NULL)(NULL)right$(NULL)(NULL)(NULL)close(NULL)len(NULL)(NULL)valstr$:";ys
  590. 2923 [129]x[178]1[164]1000
  591. 2924 [130]
  592. 2925 [151]214,15:[153]:[153][163]13)"clr(NULL)(NULL)atn(NULL)val(NULL) (NULL)atn(NULL)right$(NULL)chr$"
  593. 2983 [141]3020
  594. 2986 [141]4000
  595. 3006 [141]3190
  596. 3010 [153]"load"[163]8)"open((NULL)open)lay again"
  597. 3011 [153][163]8)"((NULL)open)eturn to (NULL)(NULL)atnstr$(NULL)(NULL)atn(NULL)"
  598. 3012 [161]a$:[139]a$[179][177]"p"[175]a$[179][177]"r"[167]3012
  599. 3013 [139]a$[178]"p"[167][138]
  600. 3014 [159]15,8,15,"r0:hello connect=hello connect":[132]15,er:[160]15
  601. 3015 [139]er[179][177]63[167][153]"load":[128]
  602. 3016 [153]"loadstopload"[199](34)"hello connect"[199](34)",8"
  603. 3017 [153]"run"
  604. 3018 [151]631,13:[151]632,13:[151]198,2:[128]
  605. 3020 [151]214,18:[153]"":[141]2685
  606. 3022 [139]ys[179]50[167][153][163]13)"(NULL)indergartner"
  607. 3035 [139]ys[177][178]50[175]ys[179]100[167][153][163]15)"1st chr$rader"
  608. 3050 [139]ys[177][178]100[175]ys[179]200[167][153][163]15)"3rd chr$rader"
  609. 3060 [139]ys[177][178]200[175]ys[179]400[167][153][163]15)"6th chr$rader"
  610. 3070 [139]ys[177][178]400[175]ys[179]1000[167][153][163]11)"8th chr$rade chr$raduate"
  611. 3090 [139]ys[177][178]1000[175]ys[179]10000[167][153][163]9)"left$igh (NULL)chool chr$raduate"
  612. 3105 [139]ys[177][178]10000[175]ys[179]50000[167][153][163]12)"lenollege chr$raduate"
  613. 3115 [139]ys[177][178]50000[167][153][163]15)"left$istorian"
  614. 3117 [137]3120
  615. 3120 [142]
  616. 3125 [139]an$[179][177]z$(my)[167][142]
  617. 3130 [151]214,18:[153]:[153][163]18)"stop   500 point peek(NULL)(NULL)(NULL)(NULL)   "
  618. 3131 [153][163]18)"  for answering the  "
  619. 3132 [153][163]18)"  (NULL)(NULL)(NULL)(NULL)val(NULL)(NULL) atn(NULL)val(NULL)right$lenatn(NULL)!stop  "
  620. 3133 [141]2705
  621. 3134 ys[178]ys[170]500
  622. 3135 [137]1755
  623. 3155 [129]x[178]1[164]1000
  624. 3156 [130]
  625. 3157 [151]214,20:[153]:[153][163]18)"(NULL)umber of errors =";nw
  626. 3158 [139]nw[178]2[167][141]3270
  627. 3170 [142]
  628. 3175 [151]54296,15
  629. 3176 [151]54277,88
  630. 3177 [151]54278,89
  631. 3178 [151]54275,1
  632. 3179 [151]54273,22
  633. 3180 [151]54276,65
  634. 3181 [129]x[178]1[164]100
  635. 3182 [130]
  636. 3183 [151]54276,64
  637. 3184 [151]54273,50
  638. 3185 [151]54276,65
  639. 3186 [129]x[178]1[164]100
  640. 3187 [130]
  641. 3188 [151]54276,64
  642. 3189 [151]54296,0:[142]
  643. 3190 [153]"loadwait";[163]12)"(NULL)(NULL)(NULL)(NULL)val(NULL)(NULL) atn(NULL)val(NULL)right$lenatn(NULL)"
  644. 3191 a$[178]z$(my)
  645. 3192 [153][163]18);"was"
  646. 3193 [153][163](40[171][195](a$))[173]2);"";a$
  647. 3194 [129]x[178]1[164]3000
  648. 3195 [130]
  649. 3196 [142]
  650. 3220 hj[178][181]([187](1)[172]8)[170]1
  651. 3222 [153]"on"[163]24);:[145]hj[137]3225,3230,3235,3240,3245,3250,3255,3260
  652. 3225 [153]"lenorrect!":[142]
  653. 3230 [153]"clr(NULL)ery chr$ood!":[142]
  654. 3235 [153]"forvalxcellent!":[142]
  655. 3240 [153]"verify(NULL)ight!":[142]
  656. 3245 [153]"cont(NULL)errific!":[142]
  657. 3250 [153]"(NULL)ell str$one!":[142]
  658. 3255 [153]"cont(NULL)uperb!":[142]
  659. 3260 [153]"verifychr$ood!":[142]
  660. 3265 [142]
  661. 3270 [151]214,21:[153]:[153][163]22)"chr$atn(NULL)val val(NULL)str$(NULL) (NULL)(NULL)"
  662. 3271 [153][163]22)"(NULL)val(NULL)(NULL)close(NULL)right$(NULL)(NULL)atn(NULL)val"
  663. 3272 [142]
  664. 3285 [153][199](14):[151]53280,0:[151]53281,0
  665. 3286 m9$[178]"                             "
  666. 3287 [153]"load":[129]i[178]0[164]2:[153]m9$:[130]
  667. 3289 m$[178]"          sysascatn(NULL)(NULL)(NULL)(NULL) atn(NULL)val(NULL)right$lenatn(NULL)(NULL)        "
  668. 3290 pl$[178]""
  669. 3291 [141]3305
  670. 3305 l[178][195](m$)
  671. 3306 mi[178]38[171]l[173]2
  672. 3307 [129]i[178]1[164][195](m$)[171]19
  673. 3308 [153][163]4)
  674. 3309 [153]pl$[166]mi)[200](m$,i)[201](m$,l[171](l[171]i))
  675. 3310 mi[178]mi[171]1
  676. 3311 [130]:[153]""[163]11)"forby (NULL)oger (NULL)orton"
  677. 3312 [142]
  678. 4000 [151]214,23:[153]:[153][163]9)"(NULL)ress a key to continue":[151]198,0
  679. 4010 [161]k$:[139]k$[178]""[167]4010
  680. 4020 [153]"load";:[142]
  681. 5000 [151]214,14:[153]
  682. 5010 [153]"cont str$o you want answers revealed?  (ycont/ncont)"
  683. 5020 [161]a$:[139]a$[179][177]"y"[175]a$[179][177]"n"[167]5020
  684. 5030 [141]2650:d9[178]0:[139]a$[178]"n"[167]d9[178]1
  685. 5040 [142]
  686. 10000 [159]15,8,15,"s0:famous americans":[160]15:[148]"famous americans",8
  687.